100REM Show current ISS
110REM position from
120REM open-notify.org
130REM open-notify.org
200TEXT:HOME:? "Querying ISS position..."
210?
220ONERR  GOTO 900
300NOPEN 1,"N:HTTP://api.open-notify.org/iss-now.json",4,0
310NJSONPARSE 1
320NJSONQUERY 1,"/iss_position/latitude",lat$
330NJSONQUERY 1,"/iss_position/longitude",lon$
340NCLOSE 1
400? "Latitude: ";lat$
410? "Longitude: ";lon$
420?:?
430? "Waiting a bit..."
440FOR x=0 TO 65000:NEXT x
450GOTO 200
900NSTATUS 1,bw,conn,err
910? "Network Error: ";err
920END
